program jm_prog;
use lib_dev_test;
use jm_input_data;
use jm_h_swave_calc_mod;
implicit none;

call lib_dev_test_all();
call jm_input_read("jm_data_input.txt");
call jm_h_swave_calc();

end program